Named-Spot-Z names an undocumented function, with lambda list (OBJECT).
(SETF Named-Spot-Z) names an undocumented function, with lambda list (NEW-VALUE OBJECT).